(define-syntax define-constant
  (syntax-rules ()
    ((define-constant ?body ...)
     (define ?body ...))))

(define seq list)

(define tail cdr)

(define null '())